home *** CD-ROM | disk | FTP | other *** search
/ Amiga Plus 1996 #6 / Amiga Plus CD - 1996 - No. 06.iso / pd / netz / amigancp1.8 / install-amigancp < prev    next >
Text File  |  1995-11-08  |  4KB  |  219 lines
  1. ; 
  2. ; Installer-Script for AmigaNCP
  3. ;
  4. ; $VER: AmigaNCP-Install 1.0 (08.11.95)
  5. ;
  6.  
  7. ;
  8. ; Strings
  9. ; 
  10.  
  11. (set #install-msg
  12. (cat    "Installing AmigaNCP Release 1.8\n\n"
  13.         "Where do you want AmigaNCP be installed?\nA drawer named"
  14.         "'AmigaNCP' will be automatically created."
  15. ))
  16.  
  17. (set #copylib-msg "Installing amigancp.library")
  18. (set #copylib-where "Please select a directory for \"amigancp.library\".")
  19. (set #copycat-msg "Installing catalogs")
  20. (set #copycat-where "Please select a directory for the language catalogs.")
  21. (set #copyserv-msg "Installing NCP Services")
  22. (set #copydoc-msg "Installing Docs")
  23. (set #copytools-msg "Installing Tools")
  24. (set #copyicons-msg "Installing Default Icon Tree")
  25. (set #copysub-msg "Installing Submission Material")
  26.  
  27. (set #wantdev-msg 
  28. (cat    "Do you want to install the Developer\n"
  29.         "Documentation and associated support files?\n\n"
  30.         "These files are needed only when you want\n"
  31.         "to develop applications using \"amigancp.library\"\n"
  32.         "or want to do a catalog translation to another\n"
  33.         "language.\n"
  34. ))
  35. (set #copydev-msg "Copying Developer files")
  36. (set #whats "What Psion computer do you own?")
  37. (set #need20 "AmigaNCP requires OS 2.04 or better!" )
  38.  
  39. ;
  40. ; Determine if running on an 68020++
  41. ;
  42. (procedure checkv20
  43.     (if (>= (database "cpu") 68020 )
  44.         (set v20-flag 1)
  45.     )
  46. )
  47. ;
  48. ;
  49. ; GO!
  50. ;
  51. ;
  52. (set vernum (getversion "LIBS:version.library"))
  53. (set ver (/ vernum 65536 ) )
  54. (set rev (- vernum (* ver 65536 ) ) )
  55.  
  56. (if (< ver 37 )
  57. (
  58.     (abort #need20)
  59. ))
  60. (welcome)
  61. (set default-dest
  62.     (askdir
  63.         (prompt #install-msg)
  64.         (help @askdir-help)
  65.         (default @default-dest)
  66.     )
  67. )
  68. (complete 1)
  69. (set @default-dest
  70.     (tackon default-dest "AmigaNCP")
  71. )
  72. (makedir @default-dest (infos))
  73. (makedir (tackon @default-dest "Docs" ) (infos))
  74. (makedir (tackon @default-dest "Tools" ) (infos))
  75. (makedir (tackon @default-dest "Submissions" ) (infos))
  76. (makedir (tackon @default-dest "Icons" ))
  77. (complete 2)
  78. ;
  79. ; Copy lib
  80. ;
  81. (set #libname "libs/amigancp.library")
  82. (checkv20)
  83. (if v20-flag
  84. (
  85.     (set #libname "libs/amigancp.library.020")
  86. ))
  87. (copyfiles
  88.     (help @copyfiles-help)
  89.     (prompt #copylib-msg)
  90.     (confirm)
  91.     (source #libname)
  92.     (newname "amigancp.library")
  93.     (dest
  94.         (askdir
  95.             (prompt #copylib-where)
  96.             (help @askdir-help)
  97.             (default "LIBS:")
  98.         )
  99.     )
  100. )
  101. (complete 10)
  102. (if (> ver 37 )
  103. (
  104.     (copyfiles
  105.         (source "Catalogs")
  106.         (prompt #copycat-msg)
  107.         (help @copyfiles-help)
  108.         (dest
  109.             (askdir
  110.                 (prompt #copycat-where)
  111.                 (help @askdir-help)
  112.                 (default "LOCALE:Catalogs")
  113.             )
  114.         )
  115.         (confirm)
  116.         (all)
  117.     )
  118. ))
  119. (complete 20)
  120. (copyfiles
  121.     (source "")
  122.     (pattern "AmigaNCP#?")
  123.     (prompt #copyserv-msg)
  124.     (help @copyfiles-help)
  125.     (confirm)
  126.     (infos)
  127.     (dest @default-dest)
  128. )
  129. (complete 34)
  130. (copyfiles
  131.     (source "Icons")
  132.     (prompt #copyicons-msg)
  133.     (help @copyfiles-help)
  134.     (dest (tackon @default-dest "Icons" ) )
  135.     (all)
  136.     (infos)
  137. )
  138. (complete 36)
  139. (copyfiles
  140.     (source "Submissions")
  141.     (prompt #copysub-msg)
  142.     (help @copyfiles-help)
  143.     (dest (tackon @default-dest "Submissions" ) )
  144.     (all)
  145.     (infos)
  146. )
  147. (complete 38)
  148. (delete (tackon @default-dest "Icons.info" ))
  149. (complete 39)
  150. (foreach "" "AmigaNCP#?"
  151.     (tooltype (
  152.         (dest (tackon @default-dest @each-name ) )
  153.         (noposition)
  154.     )
  155. ))
  156. (complete 40)
  157. (copyfiles
  158.     (source "Docs")
  159.     (prompt #copydoc-msg)
  160.     (help @copyfiles-help)
  161.     (confirm)
  162.     (infos)
  163.     (all)
  164.     (dest (tackon @default-dest "Docs" ) )
  165. )
  166. (complete 60)
  167. (copyfiles
  168.     (source "Tools")
  169.     (prompt #copytools-msg)
  170.     (help @copyfiles-help)
  171.     (confirm)
  172.     (infos)
  173.     (all)
  174.     (dest (tackon @default-dest "Tools" ) )
  175. )
  176. (complete 70)
  177. (if (askbool
  178.         (prompt #wantdev-msg)
  179.         (help #wantdev-msg)
  180.         (default 1)
  181.     )
  182. (
  183.     (set devdir (tackon @default-dest "Developer"))
  184.     (makedir devdir (infos))
  185.     (copyfiles
  186.         (source "Developer")
  187.         (prompt #copydev-msg)
  188.         (help @copyfiles-help)
  189.         (dest devdir)
  190.         (confirm)
  191.         (infos)
  192.         (all)
  193.     )
  194. ))
  195. (complete 90)
  196. (if ( = (exists "ENV:NCP.config") 0 )
  197. (
  198.     (set s3amode (askchoice
  199.         (choices "Psion S3 (or HC)" "Psion S3a (or MC)")
  200.         (default 0 )
  201.         (prompt #whats)
  202.         (help @askchoice-help)
  203.     ))
  204.     (if s3amode (
  205.         (textfile 
  206.             (dest "ENV:NCP.config")
  207.             (append "DEVICE=serial.device UNIT=0 BAUD=19200")
  208.         )
  209.     )
  210.     (
  211.         (textfile 
  212.             (dest "ENV:NCP.config")
  213.             (append "DEVICE=serial.device UNIT=0 BAUD=9600")
  214.         )
  215.     ))
  216.     (run "copy ENV:NCP.config ENVARC:NCP.config")
  217. ))
  218. (complete 100)
  219.